package com.yc.framework.utils;

import java.awt.BasicStroke;
import java.awt.Graphics;
import java.awt.Graphics2D;
import java.awt.Image;
import java.awt.Shape;
import java.awt.geom.RoundRectangle2D;
import java.awt.image.BufferedImage;
import java.io.File;
import java.io.IOException;
import java.io.OutputStream;
import java.util.Hashtable;
import javax.imageio.ImageIO;

import com.google.zxing.*;
import com.google.zxing.common.BitMatrix;
import com.google.zxing.common.HybridBinarizer;
import com.google.zxing.qrcode.decoder.ErrorCorrectionLevel;

public class QRCodeUtil {

    /**
     * 生成二维码图片
     *
     * @param content      二维码内容
     * @param imgPath      嵌入二维码图片路径
     * @param destPath     生成二维码图片路径
     * @param needCompress 是否压缩
     */
    public static void encode(String content, String imgPath, String destPath, boolean needCompress) {
        try {
            BufferedImage image = QRCodeUtil.createImage(content, imgPath, needCompress);
            if (image == null) {
                return;
            }
            mkdirs(destPath);
            // String file = new Random().nextInt(99999999)+".jpg";
            // ImageIO.write(image, FORMAT_NAME, new File(destPath+"/"+file));
            ImageIO.write(image, FORMAT_NAME, new File(destPath));
        } catch (IOException e) {
            e.printStackTrace();
        }
    }

    /**
     * 生成二维码图片
     *
     * @param content      二维码内容
     * @param imgPath      嵌入二维码图片路径
     * @param needCompress 是否压缩
     */
    public static BufferedImage encode(String content, String imgPath, boolean needCompress) {
        return QRCodeUtil.createImage(content, imgPath, needCompress);
    }

    public static void mkdirs(String destPath) {
        File file = new File(destPath);
        // 当文件夹不存在时，mkdirs会自动创建多层目录，区别于mkdir．(mkdir如果父目录不存在则会抛出异常)
        if (!file.exists() && !file.isDirectory()) {
            boolean flag = file.mkdirs();
            System.out.print("创建目录结果：" + flag);
        }
    }

    /**
     * 生成二维码图片
     *
     * @param content  二维码内容
     * @param destPath 生成二维码图片路径
     * @param imgPath  嵌入二维码图片路径
     */
    public static void encode(String content, String imgPath, String destPath) {
        QRCodeUtil.encode(content, imgPath, destPath, false);
    }


    /**
     * 生成二维码图片
     *
     * @param destPath 生成二维码图片路径
     * @param content  二维码内容
     */
    public static void encode(String content, String destPath) {
        QRCodeUtil.encode(content, null, destPath, false);
    }

    /**
     * 生成二维码图片
     *
     * @param content      二维码内容
     * @param imgPath      嵌入二维码图片路径
     * @param output       二维码图片输出位置
     * @param needCompress 是否压缩
     */
    public static void encode(String content, String imgPath, OutputStream output, boolean needCompress) {
        BufferedImage image = QRCodeUtil.createImage(content, imgPath, needCompress);
        if(image==null){
            return;
        }
        try {
            ImageIO.write(image, FORMAT_NAME, output);
        } catch (IOException e) {
            e.printStackTrace();
        }

    }

    /**
     * 生成二维码图片
     *
     * @param content 二维码内容
     * @param output  二维码图片输出位置
     */
    public static void encode(String content, OutputStream output) {
        QRCodeUtil.encode(content, null, output, false);
    }

    /**
     * 二维码图片解码
     *
     * @param file 二维码图片
     * @return 二维码
     * @throws Exception 抛出异常
     */
    public static String decode(File file) throws Exception {
        BufferedImage image;
        image = ImageIO.read(file);
        if (image == null) {
            return null;
        }
        BufferedImageLuminanceSource source = new BufferedImageLuminanceSource(image);
        BinaryBitmap bitmap = new BinaryBitmap(new HybridBinarizer(source));
        Result result;
        Hashtable<DecodeHintType,String> hints = new Hashtable<>();
        hints.put(DecodeHintType.CHARACTER_SET, CHARSET);
        result = new MultiFormatReader().decode(bitmap, hints);
        return result.getText();
    }

    /**
     * 二维码图片解码
     *
     * @param path 二维码图片路径
     * @return 二维码
     * @throws Exception 抛出异常
     */
    public static String decode(String path) throws Exception {
        return QRCodeUtil.decode(new File(path));
    }


    private static BufferedImage createImage(String content, String imgPath, boolean needCompress) {
        Hashtable<EncodeHintType,Object> hints = new Hashtable<>();
        hints.put(EncodeHintType.ERROR_CORRECTION, ErrorCorrectionLevel.H);
        hints.put(EncodeHintType.CHARACTER_SET, CHARSET);
        hints.put(EncodeHintType.MARGIN, 1);
        try {
            BitMatrix bitMatrix = new MultiFormatWriter().encode(content, BarcodeFormat.QR_CODE, QRCODE_SIZE, QRCODE_SIZE,
                    hints);
            int width = bitMatrix.getWidth();
            int height = bitMatrix.getHeight();
            BufferedImage image = new BufferedImage(width, height, BufferedImage.TYPE_INT_RGB);
            for (int x = 0; x < width; x++) {
                for (int y = 0; y < height; y++) {
                    image.setRGB(x, y, bitMatrix.get(x, y) ? 0xFF000000 : 0xFFFFFFFF);
                }
            }
            if (imgPath == null || "".equals(imgPath)) {
                return image;
            }
            // 插入图片
            QRCodeUtil.insertImage(image, imgPath, needCompress);
            return image;
        } catch (WriterException e) {
            e.printStackTrace();
        }
        return null;
    }

    private static void insertImage(BufferedImage source, String imgPath, boolean needCompress) {
        File file = new File(imgPath);
        if (!file.exists()) {
            System.err.println("" + imgPath + "   该文件不存在！");
            return;
        }
        Image src = null;
        try {
            src = ImageIO.read(new File(imgPath));
        } catch (IOException e) {
            e.printStackTrace();
        }
        if (src == null) {
            return;
        }
        int width = src.getWidth(null);
        int height = src.getHeight(null);
        if (needCompress) { // 压缩LOGO
            if (width > WIDTH) {
                width = WIDTH;
            }
            if (height > HEIGHT) {
                height = HEIGHT;
            }
            Image image = src.getScaledInstance(width, height, Image.SCALE_SMOOTH);
            BufferedImage tag = new BufferedImage(width, height, BufferedImage.TYPE_INT_RGB);
            Graphics g = tag.getGraphics();
            g.drawImage(image, 0, 0, null); // 绘制缩小后的图
            g.dispose();
            src = image;
        }
        // 插入LOGO
        Graphics2D graph = source.createGraphics();
        int x = (QRCODE_SIZE - width) / 2;
        int y = (QRCODE_SIZE - height) / 2;
        graph.drawImage(src, x, y, width, height, null);
        Shape shape = new RoundRectangle2D.Float(x, y, width, width, 6, 6);
        graph.setStroke(new BasicStroke(3f));
        graph.draw(shape);
        graph.dispose();
    }

    /**
     * 编码
     */
    private static final String CHARSET = "utf-8";

    /**
     * 图片后缀名
     */
    private static final String FORMAT_NAME = "JPG";

    /**
     * 二维码尺寸
     */
    private static final int QRCODE_SIZE = 300;

    /**
     * LOGO宽度
     */
    private static final int WIDTH = 60;

    /**
     * LOGO高度
     */
    private static final int HEIGHT = 60;
}
